home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 22
/
Cream of the Crop 22.iso
/
games
/
zmud32.zip
/
ZMUD.EXE
/
0
/
RCDATA
/
TPREFERENCES
/
TPREFERENCES.txt
Wrap
Text File
|
1996-08-04
|
43KB
|
1,665 lines
object Preferences: TPreferences
Left = 190
Top = 114
BorderStyle = bsDialog
Caption = 'Preferences'
ClientHeight = 415
ClientWidth = 564
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
Position = poScreenCenter
OnActivate = FormActivate
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 16
object Version: TLabel
Left = 8
Top = 392
Width = 73
Height = 13
Caption = 'Version'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object PrefPage: TTabbedNotebook
Left = 0
Top = 0
Width = 564
Height = 377
Align = alTop
TabsPerRow = 6
TabFont.Color = clBtnText
TabFont.Height = -12
TabFont.Name = 'MS Sans Serif'
TabFont.Style = []
TabOrder = 0
object TTabPage
Left = 4
Top = 27
Caption = 'General'
object Panel2: TPanel
Left = 8
Top = 8
Width = 145
Height = 329
BevelOuter = bvLowered
TabOrder = 0
object ANSI: TCheckBox
Left = 16
Top = 16
Width = 105
Height = 17
Alignment = taLeftJustify
Caption = 'ANSI Color'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
end
object AutoClear: TCheckBox
Left = 16
Top = 40
Width = 105
Height = 17
Alignment = taLeftJustify
Caption = 'Auto Clear Input'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
end
object ShowTrigger: TCheckBox
Left = 16
Top = 64
Width = 105
Height = 17
Alignment = taLeftJustify
Caption = 'Show Triggers'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
object Echo: TCheckBox
Left = 16
Top = 88
Width = 105
Height = 17
Alignment = taLeftJustify
Caption = 'Echo Commands'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
end
object Timer: TCheckBox
Left = 16
Top = 112
Width = 105
Height = 17
Alignment = taLeftJustify
Caption = 'Connection Timer'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
end
object HelpHint: TCheckBox
Left = 16
Top = 136
Width = 105
Height = 17
Alignment = taLeftJustify
Caption = 'Help Balloons'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
end
object NumLock: TCheckBox
Left = 16
Top = 184
Width = 105
Height = 17
Alignment = taLeftJustify
Caption = 'Auto NumLock'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 6
end
object DoAssign: TCheckBox
Left = 16
Top = 208
Width = 105
Height = 17
Alignment = taLeftJustify
Caption = 'a = b syntax'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
end
object DoExpand: TCheckBox
Left = 16
Top = 232
Width = 105
Height = 17
Alignment = taLeftJustify
Caption = 'Expand variables'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 8
end
object SpeedButtons: TCheckBox
Left = 16
Top = 160
Width = 105
Height = 17
Alignment = taLeftJustify
Caption = 'Speed buttons'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 9
end
end
object Panel29: TPanel
Left = 368
Top = 8
Width = 177
Height = 113
BevelOuter = bvLowered
TabOrder = 1
object WrapTxt: TLabel
Left = 28
Top = 70
Width = 64
Height = 13
Alignment = taRightJustify
Caption = 'Wrap Column'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Wrap: TCheckBox
Left = 35
Top = 16
Width = 81
Height = 17
Alignment = taLeftJustify
Caption = 'Word Wrap'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = WrapClick
end
object AutoWrap: TCheckBox
Left = 40
Top = 40
Width = 76
Height = 17
Alignment = taLeftJustify
Caption = 'Auto Wrap'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = AutoWrapClick
end
object WrapCol: TEdit
Left = 104
Top = 69
Width = 49
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
Text = '0'
end
end
object Panel30: TPanel
Left = 160
Top = 8
Width = 201
Height = 329
BevelOuter = bvLowered
TabOrder = 2
object Label21: TLabel
Left = 31
Top = 18
Width = 61
Height = 13
Alignment = taRightJustify
Caption = 'Spam Count:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label26: TLabel
Left = 26
Top = 42
Width = 66
Height = 13
Alignment = taRightJustify
Caption = 'Spam Length:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label20: TLabel
Left = 12
Top = 66
Width = 80
Height = 13
Alignment = taRightJustify
Caption = 'Spam Command:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label22: TLabel
Left = 30
Top = 90
Width = 62
Height = 13
Alignment = taRightJustify
Caption = 'Tick Interval:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label75: TLabel
Left = 24
Top = 114
Width = 68
Height = 13
Alignment = taRightJustify
Caption = 'Scroll Amount:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label34: TLabel
Left = 34
Top = 138
Width = 58
Height = 13
Alignment = taRightJustify
Caption = 'History Size:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SpamCount: TEdit
Left = 104
Top = 16
Width = 81
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
Text = 'SpamCount'
end
object SpamLen: TEdit
Left = 104
Top = 40
Width = 81
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
Text = 'SpamLen'
end
object SpamCom: TEdit
Left = 104
Top = 64
Width = 81
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 80
ParentFont = False
TabOrder = 2
Text = 'SpamCom'
end
object TickTimer: TEdit
Left = 104
Top = 88
Width = 81
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
Text = 'TickTimer'
end
object Scroll: TEdit
Left = 104
Top = 112
Width = 81
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
Text = 'Scroll'
end
object HistSize: TEdit
Left = 104
Top = 136
Width = 81
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
Text = 'HistSize'
end
end
object GroupBox1: TGroupBox
Left = 408
Top = 216
Width = 137
Height = 121
Caption = 'Carraige Control'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
object CR: TRadioButton
Left = 32
Top = 32
Width = 73
Height = 17
Alignment = taLeftJustify
Caption = 'CR only'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
end
object LF: TRadioButton
Left = 32
Top = 48
Width = 73
Height = 17
Alignment = taLeftJustify
Caption = 'LF only'
Checked = True
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
TabStop = True
end
object CRLF: TRadioButton
Left = 32
Top = 64
Width = 73
Height = 17
Alignment = taLeftJustify
Caption = 'CR/LF'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
object LFCR: TRadioButton
Left = 32
Top = 80
Width = 73
Height = 17
Alignment = taLeftJustify
Caption = 'LF/CR'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
end
end
end
object TTabPage
Left = 4
Top = 27
Caption = 'Characters'
object Label51: TLabel
Left = 8
Top = 288
Width = 320
Height = 13
Caption =
'If this option is checked, characters for this setting file can ' +
'be edited'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label52: TLabel
Left = 8
Top = 302
Width = 269
Height = 13
Caption = 'but characters from the Inherited file will actually be used.'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Panel3: TPanel
Left = 8
Top = 8
Width = 537
Height = 225
BevelOuter = bvLowered
TabOrder = 0
object Label7: TLabel
Left = 26
Top = 18
Width = 89
Height = 13
Alignment = taRightJustify
Caption = 'Command Char:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 25
Top = 42
Width = 90
Height = 13
Alignment = taRightJustify
Caption = 'Separator Char:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label14: TLabel
Left = 34
Top = 66
Width = 81
Height = 13
Alignment = taRightJustify
Caption = 'Variable Char:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label23: TLabel
Left = 41
Top = 162
Width = 74
Height = 13
Alignment = taRightJustify
Caption = 'History Char:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label24: TLabel
Left = 23
Top = 90
Width = 92
Height = 13
Alignment = taRightJustify
Caption = 'Parameter Char:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label25: TLabel
Left = 22
Top = 138
Width = 93
Height = 13
Alignment = taRightJustify
Caption = 'Movement Char:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 46
Top = 114
Width = 69
Height = 13
Alignment = taRightJustify
Caption = 'Focus Char:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label77: TLabel
Left = 46
Top = 186
Width = 69
Height = 13
Alignment = taRightJustify
Caption = 'Quote Char:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label1: TLabel
Left = 160
Top = 18
Width = 183
Height = 13
Caption = 'Used to begin commands. Default is #'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 160
Top = 42
Width = 275
Height = 13
Caption = 'Used to seperate multiple commands on a line. Default is ;'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 160
Top = 66
Width = 250
Height = 13
Caption = 'Used to expand the value of a variable. Default is @'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 160
Top = 114
Width = 259
Height = 13
Caption = 'Used to send commands to other windows. Default is :'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 160
Top = 90
Width = 297
Height = 13
Caption = 'Used to expand internal variables and parameters. Default is %'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 160
Top = 138
Width = 243
Height = 13
Caption = 'Used to begin speedwalking and paths. Default is .'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 160
Top = 162
Width = 223
Height = 13
Caption = 'Use to recall from command history. Default is !'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 160
Top = 186
Width = 254
Height = 13
Caption = 'Used to escape other special characters. Default is ~'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object ComChar: TEdit
Left = 120
Top = 16
Width = 25
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 1
ParentFont = False
TabOrder = 0
Text = 'ComChar'
end
object SepChar: TEdit
Left = 120
Top = 40
Width = 25
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 1
ParentFont = False
TabOrder = 1
Text = 'SepChar'
end
object VarChar: TEdit
Left = 120
Top = 64
Width = 25
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 1
ParentFont = False
TabOrder = 2
Text = 'VarChar'
end
object HistChar: TEdit
Left = 120
Top = 160
Width = 25
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 1
ParentFont = False
TabOrder = 5
Text = 'HistChar'
end
object ParamChar: TEdit
Left = 120
Top = 88
Width = 25
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 1
ParentFont = False
TabOrder = 3
Text = 'ParamChar'
end
object MoveChar: TEdit
Left = 120
Top = 136
Width = 25
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 1
ParentFont = False
TabOrder = 4
Text = 'MoveChar'
end
object FocusChar: TEdit
Left = 120
Top = 112
Width = 25
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 1
ParentFont = False
TabOrder = 6
Text = 'FocusChar'
end
object QuoteChar: TEdit
Left = 120
Top = 184
Width = 25
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 1
ParentFont = False
TabOrder = 7
Text = 'QuoteChar'
end
end
object UseChar: TCheckBox
Left = 8
Top = 320
Width = 209
Height = 17
Caption = 'Use characters from Inherited settings file'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
end
end
object TTabPage
Left = 4
Top = 27
Caption = 'Directories'
object GroupBox5: TGroupBox
Left = 16
Top = 8
Width = 497
Height = 93
Caption = 'ZMUD.INI file location'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
object Label36: TLabel
Left = 16
Top = 16
Width = 384
Height = 13
Caption =
'Note, the ZMUD.INI located in the same directory as ZMUD.EXE is ' +
'used to store '
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label37: TLabel
Left = 16
Top = 30
Width = 436
Height = 13
Caption =
'these Directory settings. The ZMUD.INI in the following locatio' +
'n is used for all other settings.'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object IniEXE: TRadioButton
Left = 16
Top = 48
Width = 137
Height = 17
Caption = 'ZMUD.EXE directory'
Checked = True
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
TabStop = True
OnClick = IniEXEClick
end
object IniCur: TRadioButton
Left = 16
Top = 64
Width = 137
Height = 17
Caption = 'Current directory'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = IniEXEClick
end
object IniOther: TRadioButton
Left = 168
Top = 48
Width = 129
Height = 17
Caption = 'Other:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = IniEXEClick
end
object IniLoc: TEdit
Left = 168
Top = 64
Width = 297
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
end
end
object GroupBox6: TGroupBox
Left = 16
Top = 104
Width = 497
Height = 77
Caption = 'MUDCHAR.DAT file location'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
object Label35: TLabel
Left = 16
Top = 16
Width = 432
Height = 13
Caption =
'This file stores MUD names, address, port, and character names a' +
'nd passwords (encrypted)'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object CharEXE: TRadioButton
Left = 16
Top = 32
Width = 137
Height = 17
Caption = 'ZMUD.EXE directory'
Checked = True
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
TabStop = True
OnClick = CharEXEClick
end
object CharCur: TRadioButton
Left = 16
Top = 48
Width = 137
Height = 17
Caption = 'Current directory'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = CharEXEClick
end
object CharOther: TRadioButton
Left = 168
Top = 32
Width = 129
Height = 17
Caption = 'Other:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = CharEXEClick
end
object CharLoc: TEdit
Left = 168
Top = 48
Width = 297
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
end
end
object GroupBox7: TGroupBox
Left = 16
Top = 184
Width = 497
Height = 77
Caption = 'Settings file locations'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
object Label38: TLabel
Left = 16
Top = 16
Width = 441
Height = 13
Caption =
'Default location (can be overridden). Contains the triggers, al' +
'iases, etc for various characters.'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SetEXE: TRadioButton
Left = 16
Top = 32
Width = 137
Height = 17
Caption = 'ZMUD.EXE directory'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = SetEXEClick
end
object SetCur: TRadioButton
Left = 16
Top = 48
Width = 137
Height = 17
Caption = 'Current directory'
Checked = True
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
TabStop = True
OnClick = SetEXEClick
end
object SetOther: TRadioButton
Left = 168
Top = 32
Width = 129
Height = 17
Caption = 'Other:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = SetEXEClick
end
object SetLoc: TEdit
Left = 168
Top = 48
Width = 297
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
end
end
object GroupBox8: TGroupBox
Left = 16
Top = 264
Width = 497
Height = 77
Caption = 'Sound file locations'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
object Label39: TLabel
Left = 16
Top = 16
Width = 334
Height = 13
Caption =
'Used to locate sound files for Sound Settings and for #PLAY comm' +
'and'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SoundEXE: TRadioButton
Left = 16
Top = 32
Width = 137
Height = 17
Caption = 'ZMUD.EXE directory'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = SoundEXEClick
end
object SoundCur: TRadioButton
Left = 16
Top = 48
Width = 137
Height = 17
Caption = 'Current directory'
Checked = True
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
TabStop = True
OnClick = SoundEXEClick
end
object SoundOther: TRadioButton
Left = 168
Top = 32
Width = 129
Height = 17
Caption = 'Other:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = SoundEXEClick
end
object SoundLoc: TEdit
Left = 168
Top = 48
Width = 297
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
end
end
end
object TTabPage
Left = 4
Top = 27
Caption = 'Memory'
object Image1: TImage
Left = 304
Top = 16
Width = 32
Height = 32
AutoSize = True
end
object Label12: TLabel
Left = 334
Top = 24
Width = 214
Height = 13
Caption = 'Click on a window to the left to display its size'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label13: TLabel
Left = 344
Top = 42
Width = 25
Height = 13
Caption = 'Used'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label15: TLabel
Left = 424
Top = 42
Width = 55
Height = 13
Caption = 'bytes out of'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label32: TLabel
Left = 312
Top = 120
Width = 149
Height = 13
Caption = 'All memory sizes are in kilobytes'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label33: TLabel
Left = 8
Top = 8
Width = 131
Height = 13
Caption = 'Current windows in memory:'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object MemGrid: TDrawGrid
Left = 8
Top = 24
Width = 289
Height = 313
TabStop = False
ColCount = 2
DefaultRowHeight = 17
FixedCols = 0
RowCount = 20
FixedRows = 0
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Options = [goRowSelect]
ParentFont = False
ScrollBars = ssVertical
TabOrder = 0
OnClick = MemGridClick
OnDrawCell = MemGridDrawCell
ColWidths = (
82
205)
end
object CurSize: TEdit
Left = 372
Top = 40
Width = 46
Height = 21
TabStop = False
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 1
Text = 'CurSize'
end
object MaxSize: TEdit
Left = 490
Top = 40
Width = 55
Height = 21
TabStop = False
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 2
Text = 'MaxSize'
end
object GroupBox2: TGroupBox
Left = 304
Top = 136
Width = 241
Height = 57
Caption = 'Memory sizes for Main Windows'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
object Label17: TLabel
Left = 14
Top = 22
Width = 17
Height = 13
Caption = 'Min'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label18: TLabel
Left = 91
Top = 22
Width = 20
Height = 13
Caption = 'Max'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label19: TLabel
Left = 168
Top = 22
Width = 15
Height = 13
Caption = 'Inc'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object MainMin: TEdit
Left = 35
Top = 21
Width = 46
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
Text = 'MainMin'
end
object MainMax: TEdit
Left = 115
Top = 21
Width = 46
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
Text = 'MainMax'
end
object MainInc: TEdit
Left = 187
Top = 21
Width = 46
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
Text = 'MainInc'
end
end
object GroupBox3: TGroupBox
Left = 304
Top = 208
Width = 241
Height = 57
Caption = 'Memory sizes for Child Windows'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
object Label16: TLabel
Left = 14
Top = 22
Width = 17
Height = 13
Caption = 'Min'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label27: TLabel
Left = 91
Top = 22
Width = 20
Height = 13
Caption = 'Max'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label28: TLabel
Left = 168
Top = 22
Width = 15
Height = 13
Caption = 'Inc'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object ChildMin: TEdit
Left = 35
Top = 21
Width = 46
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
Text = 'MainMin'
end
object ChildMax: TEdit
Left = 115
Top = 21
Width = 46
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
Text = 'MainMax'
end
object ChildInc: TEdit
Left = 187
Top = 21
Width = 46
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
Text = 'MainInc'
end
end
object GroupBox4: TGroupBox
Left = 304
Top = 280
Width = 241
Height = 57
Caption = 'Memory sizes for Command Editor'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
object Label29: TLabel
Left = 14
Top = 22
Width = 17
Height = 13
Caption = 'Min'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label30: TLabel
Left = 91
Top = 22
Width = 20
Height = 13
Caption = 'Max'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label31: TLabel
Left = 168
Top = 22
Width = 15
Height = 13
Caption = 'Inc'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object EditMin: TEdit
Left = 35
Top = 21
Width = 46
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
Text = 'MainMin'
end
object EditMax: TEdit
Left = 115
Top = 21
Width = 46
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
Text = 'MainMax'
end
object EditInc: TEdit
Left = 187
Top = 21
Width = 46
Height = 21
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
Text = 'MainInc'
end
end
object MemList: TListBox
Left = 200
Top = 192
Width = 121
Height = 97
TabStop = False
ItemHeight = 16
Sorted = True
TabOrder = 6
Visible = False
end
end
end
object OKBtn: TBitBtn
Left = 304
Top = 384
Width = 81
Height = 27
Caption = '&OK'
Default = True
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ModalResult = 1
ParentFont = False
TabOrder = 1
OnClick = OKBtnClick
Margin = 2
NumGlyphs = 2
Spacing = -1
end
object CancelBtn: TBitBtn
Left = 392
Top = 384
Width = 81
Height = 27
Cancel = True
Caption = '&Cancel'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ModalResult = 2
ParentFont = False
TabOrder = 2
OnClick = CancelBtnClick
Margin = 2
NumGlyphs = 2
Spacing = -1
end
object BitBtn1: TBitBtn
Left = 480
Top = 384
Width = 81
Height = 27
HelpContext = 101
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
Kind = bkHelp
end
end